home *** CD-ROM | disk | FTP | other *** search
/ NeXT Education Software Sampler 1992 Fall / NeXT Education Software Sampler 1992 Fall.iso / SoundAndMusic / cmix / lib / comb.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-07-13  |  240 b   |  14 lines
  1. #include "../H/combs.h"
  2.  
  3. float comb(samp,a)
  4. float samp,*a;
  5. {
  6.     float temp,*aptr;
  7.     if ( a[STARTM1] >= (int) a[0]) a[STARTM1] = START;
  8.     aptr = a + (int)a[STARTM1];
  9.     a[STARTM1] ++; 
  10.     temp = *aptr;
  11.     *aptr = *aptr * a[1] + samp;
  12.     return(temp);
  13. }
  14.